home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / bbs_util / wthrv119.zip / WTHR-ACE.MOD < prev    next >
Text File  |  1994-04-16  |  4KB  |  119 lines
  1. ┌────────────────────────────────────────────────────────────────────────────┐
  2. │ Mod Name: WTHR-ACE.MOD                  Mod Author: Ace Man @7426          │
  3. │ Difficulty: From 1 to 10, this is a 1. Date: 04-03-94                      │
  4. │ WWIV Version: 4.23, but should work with all.                              │
  5. │ Description: This mod allows users to view updated WEATHER stats upon      │
  6. │              logon.  SEE NOTE!                                             │
  7. └────────────────────────────────────────────────────────────────────────────┘
  8.  
  9.  
  10. --------------------------------- WEATHER.MOD -------------------------------
  11.  
  12. This Mod is for use with those of you that use the WEATHER program put
  13. out by those at Moobasi Optics Ink.  What is does is allow you, and your
  14. users, to view the WEATHER stats upon logon.  I use it on my BBS and it works
  15. perfectly.  Enjoy!
  16.  
  17. -----------------------------------------------------------------------------
  18.  
  19.  
  20. Open up LILO.C and search for this chunk of file  <I have it around line 305
  21. but yours may be different>.
  22.  
  23.  
  24.   useron=1;
  25.   write_inst(INST_LOC_LOGON,0,INST_FLAGS_ONLINE);
  26.   if (live_user) {
  27.     reset_colors();
  28.     ansic(0);
  29.     outchr(12);
  30.  
  31. OK, right above that 'useron=1;' bit...  at these few lines.
  32.  
  33.     clrscrb();
  34.     npr("1Would you like to view the Ace's BBS Weather Reports? ");
  35.     if (yn()) {
  36.      weather_menu();
  37. }
  38.  
  39. -------------------------Close LILO.C and Open MISCCMD.C ----------------
  40.  
  41. OK.. at the very bottom of Misccmd.C add this:
  42.  
  43.  
  44. /******************/
  45. /*  Wthr-Ace.Mod  */
  46. /******************/
  47. void weather_menu(void)
  48.  {
  49.   char ch;
  50.     clrscrb();
  51.     npr("8┌────────────────────────────────┐"); nl();
  52.     npr("8│ 71.1 Daily Forecast              8│"); nl();
  53.     npr("8│ 72.1 Extented Forecast           8│"); nl();
  54.     npr("8│ 73.1 Severe Weather Warnings     8│"); nl();
  55.     npr("8│ 74.1 Zone Forecast               8│"); nl();
  56.     npr("8│ 75.1 Recreational Weather Report 8│"); nl();
  57.     npr("8│ 76.1 Marine Weather Report       8│"); nl();
  58.     npr("8│ 7Q.1 Quit Weather Reports        8│"); nl();
  59.     npr("8└────────────────────────────────┘"); nl();
  60.  
  61.     npr("1Enter Your Selection:7 ");
  62.     ch=onek("Q123456");
  63.     switch(ch) {
  64.         case 'Q':
  65.         break;
  66.         case '1':
  67.         printfile("WT-CLT.LFP");  /* <--- Change to Match the Filenames
  68.         pausescr();                       you have!  (DAILY WEATHER!) */
  69.         weather_menu();
  70.         break;
  71.         case '2':
  72.         printfile("WT-CLT.EFP");  /* Ditto...  for EXTENDED WEATHER! */
  73.         pausescr();
  74.         weather_menu();
  75.         break;
  76.         case '3':
  77.         printfile("WT-CLT.SVR");  /* Ditto again...  SEVER WEATHER! */
  78.         pausescr();
  79.         weather_menu();
  80.         break;
  81.         case '4':
  82.         printfile("WT-CLT.ZFP");  /* Ya know it...  ZONE WEATHER */
  83.         pausescr();
  84.         weather_menu();
  85.         break;
  86.         case '5':
  87.         printfile("WT-CLT.REC");  /* Uh huh...  RECREATIONAL WEATHER */
  88.         pausescr();
  89.         weather_menu();
  90.         break;
  91.         case '6':
  92.         printfile("WT-CLT.MAR");  /* Ahh...  MARINE WEATHER! */
  93.         pausescr();
  94.         weather_menu();
  95.         break;
  96. }
  97. }
  98.  
  99.  
  100.  
  101. ------------------------ CLOSE MISCCMD.C ------------------------------------
  102.  
  103. Now type MAKE and recompile.  Enjoy!
  104.  
  105.  
  106. One more note:  If you did not choose the option in your WEATHER program
  107.                make it get all 6 weather files.  The just comment out
  108.                the sections you don't need and don't forget to
  109.                change the Menu and also to change the
  110.                "ch=onek("Q123456");" bit to reflect how many choices
  111.                you have.
  112.  
  113.  
  114.  
  115. This mod was brought to you by Ace Man of Ace's BBS 704-568-5028.
  116. WWIVNet - @7426, ICEnet - @7426, TARDISnet - @7426, ACnet - @7426
  117.  
  118. Enjoy!
  119.